home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…rary 7 (Internal Edition) / Apple R&P Lib Internal v7.0.iso / 1-Reference / •ARPL Stacks / Library Help / Library Help / stack_-1.xml < prev   
Extensible Markup Language  |  1991-03-26  |  4KB  |  30 lines
  1. <?xml version="1.0" encoding="utf-8" ?>
  2. <!DOCTYPE stack PUBLIC "-//Apple, Inc.//DTD stack V 2.0//EN" "" >
  3. <stack>
  4.     <name>in</name>
  5.     <id>-1</id>
  6.     <cardCount>9</cardCount>
  7.     <cardID>4197</cardID>
  8.     <listID>3750</listID>
  9.     <cantModify><true /></cantModify>
  10.     <cantDelete><false /></cantDelete>
  11.     <cantAbort><true /></cantAbort>
  12.     <cardSize>
  13.         <width>512</width>
  14.         <height>342</height>
  15.     </cardSize>
  16.     <script>--------------------------------------------------------------------------                          Stack: Library Help                       ----                          ¬©1990 Medior, Inc.                        ----                      ¬©1990 Apple Computer, Inc.                    ----                                                                    ----                           12/13/90 4:32 PM                         ----                             Version: 6.0                           --------------------------------------------------------------------------on domenu menuItemglobal UserNameif UserName is in "David Goldman Peter Meyer" then pass domenuelse if menuItem is in "Quit HyperCard Home" then LinkToQuit menuItemelse if menuItem is in "First Next Last Prev Back Recent" thenbeepelse pass doMenuend domenuon LinkToQuit whereglobal gMainStack6,gLastCardset cursor to 4if gMainStack6 is not "" thenset lockmessages to trueset lockScreen to trueput long id of this cd into gLastCardgo stack gMainStack6send LinkToQuit to this stackelseif where = "Home" thenvisual barn door closego homeelse send "domenu Quit HyperCard" to HyperCardend ifend LinkToQuiton LinkToMapglobal gMainStack6if gMainStack6 is not "" thenset cursor to 4go cd "Map" of stack gMainStack6unlock screen with iris closeelsebeepanswer "The stack containing the map is not available now!"¬¨with "Cancel"end ifend LinkToMapFunction linenumber--// Used to find the line number that was clicked on in a--// either a scrolling field or a non-scrolling fieldif the style of target is "scrolling" thenput (((the scroll of target)¬¨+(the clickV)-(top of target))¬¨/ the textheight of target) into temp1elseput (((the clickV)-(top of target))¬¨/ the textheight of target) into temp1end ifput trunc (temp1) into temp2        --// Fudge factor for wide marginsif temp1-temp2 ‚â• .25 thenreturn trunc(temp2) + 1else return trunc(temp2)end linenumber------------------------- Function SelectLine ----------------------------Function selectLine lineNumber,fldNamedo ("put line lineNumber of " & fldName & " into theLine")if theLine is not "" thendo ("put (number of chars of line 1 to lineNumber of" && fldName &¬¨") + 1 into endChar")do ("select char (endChar - length of theLine) to endChar of" &&¬¨fldName)else return falseend selectLine------------------------- Function BtnSelect ----------------------------function BtnSelect lineNum,fldName--// Handles location and hilite of cd btn in category list.put top of fldName into yput the textheight of fldName into txthtput y - 3  + (txtht*lineNum) into btnyput item 1 of the loc of cd btn "hiliter" into btnxset loc of btn "hiliter" to btnx,btnyset hilite of btn "hiliter" to trueend btnselect</script>
  17.     <background id="2782" file="background_2782.xml" name="General" />
  18.     <background id="2958" file="background_2958.xml" name="Presentations" />
  19.     <background id="4490" file="background_4490.xml" name="Menu" />
  20.     <card id="4197" file="card_4197.xml" marked="false" name="Menu" owner="4490" />
  21.     <card id="4714" file="card_4714.xml" marked="false" name="1-Setting Up the Library CD" owner="2782" />
  22.     <card id="4926" file="card_4926.xml" marked="false" name="2-Navigation" owner="2782" />
  23.     <card id="5350" file="card_5350.xml" marked="false" name="3-Loading Correct Fonts" owner="2782" />
  24.     <card id="6137" file="card_6137.xml" marked="false" name="4-Updating Contents" owner="2782" />
  25.     <card id="6551" file="card_6551.xml" marked="false" name="5-About This Stack" owner="2782" />
  26.     <card id="7057" file="card_7057.xml" marked="false" name="1-Viewing Presentations" owner="2958" />
  27.     <card id="11540" file="card_11540.xml" marked="false" name="2-Customizing Presentations" owner="2958" />
  28.     <card id="12097" file="card_12097.xml" marked="false" name="3-Presentations on AppleLink" owner="2958" />
  29. </stack>
  30.